array(2) Real mat
array(2) Partition p

Int i // CHANGE: Tive que declarar, no teste não tinha

p[0] = "/home/tiemi/UFSCar/2011/LabComp/Trab/tests/p1.clu" // CHANGE: uso de aspas
p[1] = "p2.clu"  // CHANGE: uso de aspas


forall i (0, 2) {	// for (i = 0; i < 2; i++)
	// calcula CR em relacao a p[0]
	mat[i] = calcCR(p[0], p[i])
}


forall i (0, 2) { 
	/* imprime o nome do arquivo e o CR calculado */
	print (p[i], "\t", mat[i], "\n")
}

